﻿Module Module1
  Sub Main()
    Dim I As Integer
    For I = 1 To 100
      If I Mod 2 = 0 Then
        Continue For
      End If
      Console.WriteLine(I)
    Next
    Console.ReadLine()
  End Sub
End Module

